Use of the LIKE statement for fields with the same specification that are being used together in the same statements makes the relevance of
individual fields more understandable, and gives easy reference information, and makes relationships between those fields more obvious.
Noncompliant code example
D NAME S 20A
D PNAM S 20A
Compliant solution
D NAME S 20A
D PNAM S LIKE(NAME)
